#include "ffmpegutils.h"

// 处理错误码
#define ERROR_BUF(ret) \
    char errbuf[1024]; \
    av_strerror(ret, errbuf, sizeof (errbuf));

// 输入缓冲区的大小
#define IN_DATA_SIZE 20480
// 需要再次读取输入文件数据的阈值
#define REFILL_THRESH 4096

FFmpegUtils::FFmpegUtils(){}

static int frameIdx = 0;

static int decode(AVCodecContext *ctx,AVPacket *pkt,AVFrame *frame,QFile &outFile){
    // 发送压缩数据到解码器
    int ret = avcodec_send_packet(ctx,pkt);
    if (ret < 0) {
        ERROR_BUF(ret);
        qDebug() << "avcodec_send_packet error" << errbuf;
        return ret;
    }

    while (true) {
        // 获取解码后的数据
        ret = avcodec_receive_frame(ctx, frame);
        if (ret == AVERROR(EAGAIN) || ret == AVERROR_EOF) {
            return 0;
        } else if (ret < 0) {
            ERROR_BUF(ret);
            qDebug() << "avcodec_receive_frame error" << errbuf;
            return ret;
        }

        qDebug()<<"解码出第"<< ++frameIdx << "帧";
//        qDebug() << frame->data[0] << frame->data[1]<< frame->data[2];// 0x96faa80 0x9746000 0x9758e00
        /**
          * frame->data[0] 0x96faa80
          * frame->data[1] 0x9746000
          * frame->data[1] 0x9758e00
          *
          * frame->data[1] - frame->data[0] = 308608 = Y平面大小
          * frame->data[2] - frame->data[1] = 77312 =U平面大小
          *
          * Y平面大小 = 640 * 480 *1 = 307200
          * U平面大小 = 640 * 480 *0.25 = 76800
          * V平面大小 = 640 * 480 *0.25 = 76800
          */

        // 将解码后的数据写入文件
        int imgSize = av_image_get_buffer_size(ctx->pix_fmt,ctx->width,ctx->height,1);
//        qDebug()<<"每一帧大小:"<<imgSize;
//        outFile.write((char *)frame->data[0],imgSize);
        // 写入Y平面
        outFile.write((char *)frame->data[0],frame->linesize[0] * ctx->height);
        // 写入U平面
        outFile.write((char *)frame->data[1],frame->linesize[1] * ctx->height >> 1);
        // 写入U平面
        outFile.write((char *)frame->data[2],frame->linesize[2] * ctx->height >> 1);
    }
}

void FFmpegUtils::h264Decode(const char *inFilename,
                           VideoDecodeSpec &out){
    // 返回结果
    int ret = 0;

    // 每次从输入文件中读取的长度
    int inLen = 0;
    // 是否已经读取到了输入文件的尾部
    int inEnd = 0;

    // 用来存放读取的文件数据
    // 加上AV_INPUT_BUFFER_PADDING_SIZE是为了防止某些优化过的reader一次性读取过多导致越界
    char inDataArray[IN_DATA_SIZE + AV_INPUT_BUFFER_PADDING_SIZE];
    char *inData = inDataArray;

    // 文件
    QFile inFile(inFilename);
    QFile outFile(out.filename);

    // 解码器
    AVCodec *codec = nullptr;
    // 上下文
    AVCodecContext *ctx = nullptr;
    // 解析器上下文
    AVCodecParserContext * parserCtx = nullptr;

    // 存放解码前的数据(h264)
    AVPacket *pkt = nullptr;
    // 存放解码后的数据(yuv)
    AVFrame *frame = nullptr;

    // 获取解码器
//    codec = avcodec_find_decoder_by_name("h264");
    codec = avcodec_find_decoder(AV_CODEC_ID_H264);
    if (!codec) {
        qDebug() << "decoder libfdk_aac not found";
        return;
    }

    // 初始化解析器上下文
    parserCtx = av_parser_init(codec->id);
    if (!parserCtx) {
        qDebug() << "av_parser_init error";
        return;
    }

    // 创建上下文
    ctx = avcodec_alloc_context3(codec);
    if (!ctx) {
        qDebug() << "avcodec_alloc_context3 error";
        goto end;
    }

    // 创建AVPacket
    pkt = av_packet_alloc();
    if (!pkt) {
        qDebug() << "av_packet_alloc error";
        goto end;
    }

    // 创建AVFrame
    frame = av_frame_alloc();
    if (!frame) {
        qDebug() << "av_frame_alloc error";
        goto end;
    }

    // 打开解码器
    ret = avcodec_open2(ctx, codec, nullptr);
    if (ret < 0) {
        ERROR_BUF(ret);
        qDebug() << "avcodec_open2 error" << errbuf;
        goto end;
    }

    // 打开文件
    if (!inFile.open(QFile::ReadOnly)) {
        qDebug() << "file open error:" << inFilename;
        goto end;
    }
    if (!outFile.open(QFile::WriteOnly)) {
        qDebug() << "file open error:" << out.filename;
        goto end;
    }

    // 读取数据
    do{
        // 从文件中读取h264数据
        inLen = inFile.read(inDataArray, IN_DATA_SIZE);
        // 设置是否到了文件尾部
        inEnd = !inLen;

        // 让inData指向数组的首元素
        inData = inDataArray;
        // 只要输入缓冲区中还有等待进行解码的数据
        while (inLen > 0 || inEnd) {
            // 到了文件尾部（虽然没有读取任何数据，但也要调用av_parser_parse2，修复bug）
            // 经过解析器解析
           ret = av_parser_parse2(parserCtx, ctx,
                                  &pkt->data, &pkt->size,
                                  (uint8_t *) inData, inLen,
                                  AV_NOPTS_VALUE, AV_NOPTS_VALUE, 0);

           if (ret < 0) {
               ERROR_BUF(ret);
               qDebug() << "av_parser_parse2 error" << errbuf;
               goto end;
           }

           // 跳过已经解析过的数据
           inData += ret;
           // 减去已经解析过的数据大小
           inLen -= ret;

           qDebug() << "pkt->size:" << pkt->size << "ret:" << ret;

           // 解码
           if (pkt->size > 0 && decode(ctx, pkt, frame, outFile) < 0) {
               goto end;
           }

           // 如果到了文件尾部
           if (inEnd) break;
        }
    }while (!inEnd);
    /*while ((inLen = inFile.read(inDataArray,IN_DATA_SIZE)) >0) {
        // 让inData指向数组的首元素
        inData = inDataArray;

        // 只要输入缓冲区中还有等待进行解码的数据
        while (inLen > 0) {
            // 经过解析器上下文处理
            ret = av_parser_parse2(parserCtx, ctx,
                                   &pkt->data, &pkt->size,
                                   (uint8_t *) inData, inLen,
                                   AV_NOPTS_VALUE, AV_NOPTS_VALUE, 0);
            if (ret < 0) {
                ERROR_BUF(ret);
                qDebug() << "av_parser_parse2 error" << errbuf;
                goto end;
            }

            // 跳过已经解析过的数据
            inData += ret;
            // 减去已经解析过的数据大小
            inLen -= ret;

            qDebug() << "pkt->size:" << pkt->size << "ret:" << ret;

            // 解码
            if (pkt->size > 0 && decode(ctx, pkt, frame, outFile) < 0) {
                goto end;
            }
        }
    }*/

    // 刷新缓冲区
    //    pkt->data = NULL;
    //    pkt->size = 0;
    //    decode(ctx, pkt, frame, outFile);
    decode(ctx, nullptr, frame, outFile);

    // 赋值输出参数
    out.width = ctx->width;
    out.height = ctx->height;
    out.pixFmt = ctx->pix_fmt;
    // 用framerate.num获取帧率，并不是time_base.den
    out.fps = ctx->framerate.num;

end:
    inFile.close();
    outFile.close();
    av_frame_free(&frame);
    av_packet_free(&pkt);
    av_parser_close(parserCtx);
    avcodec_free_context(&ctx);

}
